home *** CD-ROM | disk | FTP | other *** search
/ Aminet 35 / Aminet 35 (2000)(Schatztruhe)[!][Feb 2000].iso / Aminet / dev / src / stefanb_src.lha / Old_Projects / ToolManager / Programmers / slib / changetm.asm < prev    next >
Encoding:
Assembly Source File  |  1992-09-26  |  461 b   |  32 lines
  1.  
  2.         IFD BARFLY
  3.          CODE
  4.          SMALLDATA a4
  5.         ELSE
  6.          CSECT text,0
  7.         ENDC
  8.  
  9.         XREF _ToolManagerBase
  10.         XREF _LVOChangeTMObjectTagList
  11.  
  12.         XDEF _ChangeTMObjectTags
  13. _ChangeTMObjectTags:
  14.         movem.l a2/a6,-(sp)
  15.  
  16.         lea 20(sp),a2
  17.         bra.s Common
  18.  
  19.         XDEF _ChangeTMObjectTagList
  20. _ChangeTMObjectTagList:
  21.         movem.l a2/a6,-(sp)
  22.  
  23.         move.l 20(sp),a2
  24. Common:        move.l _ToolManagerBase(a4),a6
  25.         movem.l 12(sp),a0/a1
  26.         jsr _LVOChangeTMObjectTagList(a6)
  27.  
  28.         movem.l (sp)+,a2/a6
  29.         rts
  30.  
  31.         END
  32.